home *** CD-ROM | disk | FTP | other *** search
/ Great Canadian Scientists / GCS_CD.iso / mac / PC / GCSData / menus_o.dxr / 00103_Enter Startup Screen.ls < prev    next >
Encoding:
Text File  |  1996-09-08  |  280 b   |  13 lines

  1. on exitFrame
  2.   global BoxUp, menu
  3.   set menu to "Startup Menu"
  4.   repeat with count = 21 to 23
  5.     set the hilite of cast count to 0
  6.   end repeat
  7.   if BoxUp = 0 then
  8.     set the editableText of sprite 17 to 0
  9.   end if
  10.   BSetup(8, 9)
  11.   preloadMember(member 21 of castLib 2, 30)
  12. end
  13.